(perl-imenu-generic-expression): Recognize packages.

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index 21fce869f6d430b16757dd47f4d78835df245f30..42353d559ab5b443adaf8964dcab70f82836d1b5 100644 (file)
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -154,6 +154,7 @@ The expansion is entirely correct because it uses the C preprocessor."
     (nil "^sub\\s-+\\([-A-Za-z0-9+_:]+\\)\\(\\s-\\|\n\\)*{" 1 )
     ;;Variables
     ("Variables" "^\\([$@%][-A-Za-z0-9+_:]+\\)\\s-*=" 1 )
+    ("Packages" "^package\\s-+\\([-A-Za-z0-9+_:]+\\);" 1 )
     )
   "Imenu generic expression for Perl mode.  See `imenu-generic-expression'.")